Librerías

library(tidyverse)
library(data.table)
library(readxl)
library(GGally)
library(leaflet)
library(raster)
library(mltools)

Lectura de datos

raw_encuesta <- fread("databases/calidad_vida_ok.csv", encoding = "UTF-8") %>% 
  as_tibble()

# Unificación de las estadísticas de los barrios "ALTAVISTA" y "CABECERA ALTAVISTA"

raw_encuesta <- raw_encuesta %>% mutate(
  encuesta_calidad.barrio = case_when(
    encuesta_calidad.barrio == "CABECERA ALTAVISTA" ~ "ALTAVISTA",
    TRUE ~ encuesta_calidad.barrio
  )
)

# One-hot encoding para variable estudio

variables_categoricas <- raw_encuesta[, c("encuesta_calidad.p_45")] %>% mutate(
  encuesta_calidad.p_45 = as.factor(encuesta_calidad.p_45)
) %>% rename(
  nivel_estudio = encuesta_calidad.p_45 
)

variables_categoricas_encoding <- one_hot(as.data.table(variables_categoricas))
raw_encuesta <- data.frame(raw_encuesta, variables_categoricas_encoding)

Creación de la base de datos

#Agregación de las variables

db_escolaridad <- raw_encuesta %>% 
  group_by(encuesta_calidad.barrio) %>% 
  summarize(edad_promedio = mean(`encuesta_calidad.p_18`, na.rm = TRUE),
            proporcion_lectoescritura = sum(`encuesta_calidad.p_35` == 1, na.rm = TRUE) / sum(!is.na(`encuesta_calidad.p_35`), na.rm = TRUE),
            proporcion_escolaridad_actual = sum(`encuesta_calidad.p_36` == 1, na.rm = TRUE) / sum(!is.na(`encuesta_calidad.p_36`), na.rm = TRUE),
            estudio_ultimo_ano = sum(`encuesta_calidad.p_37` == 1, na.rm = TRUE) / sum(!is.na(`encuesta_calidad.p_37`), na.rm = TRUE),
            proporcion_instituciones_publicas = sum(`encuesta_calidad.p_49` == 1, na.rm = TRUE) / sum(!is.na(`encuesta_calidad.p_49`), na.rm = TRUE),
            proporcion_nivel_estudio_0 = sum(`nivel_estudio_0` == 1, na.rm = TRUE) / sum(!is.na(`nivel_estudio_0`), na.rm = TRUE),
            proporcion_nivel_estudio_1 = sum(`nivel_estudio_1` == 1, na.rm = TRUE) / sum(!is.na(`nivel_estudio_1`), na.rm = TRUE),
            proporcion_nivel_estudio_2 = sum(`nivel_estudio_2` == 1, na.rm = TRUE) / sum(!is.na(`nivel_estudio_2`), na.rm = TRUE),
            proporcion_nivel_estudio_3 = sum(`nivel_estudio_3` == 1, na.rm = TRUE) / sum(!is.na(`nivel_estudio_3`), na.rm = TRUE),
            proporcion_nivel_estudio_4 = sum(`nivel_estudio_4` == 1, na.rm = TRUE) / sum(!is.na(`nivel_estudio_4`), na.rm = TRUE),
            proporcion_nivel_estudio_5 = sum(`nivel_estudio_5` == 1, na.rm = TRUE) / sum(!is.na(`nivel_estudio_5`), na.rm = TRUE),
            proporcion_nivel_estudio_6 = sum(`nivel_estudio_6` == 1, na.rm = TRUE) / sum(!is.na(`nivel_estudio_6`), na.rm = TRUE),
            proporcion_nivel_estudio_7 = sum(`nivel_estudio_7` == 1, na.rm = TRUE) / sum(!is.na(`nivel_estudio_7`), na.rm = TRUE),
            proporcion_nivel_estudio_8 = sum(`nivel_estudio_8` == 1, na.rm = TRUE) / sum(!is.na(`nivel_estudio_8`), na.rm = TRUE),
            proporcion_nivel_estudio_9 = sum(`nivel_estudio_9` == 1, na.rm = TRUE) / sum(!is.na(`nivel_estudio_9`), na.rm = TRUE),
            proporcion_nivel_estudio_10 = sum(`nivel_estudio_10` == 1, na.rm = TRUE) / sum(!is.na(`nivel_estudio_10`), na.rm = TRUE)
          ) %>% as.data.frame()

# Convertimos la columna que tiene el nombre del barrio en los rownames

rownames(db_escolaridad) <- db_escolaridad[, 1]
db_escolaridad[, 1] <- NULL

# Corrección de nombres en los barrios

rownames(db_escolaridad) <- rownames(db_escolaridad) %>% 
  str_replace("ANDALUCIA", "ANDALUCÍA") %>% 
  str_replace("Nº 2", "NO.2") %>% 
  str_replace("Nº 1", "NO.1") %>% 
  str_replace("Nº 3", "NO.3") %>%
  str_replace("AREA EXPANSION", "ÁREA DE EXPANSIÓN") %>% 
  str_replace("EXPANCION", "EXPANSIÓN") %>% 
  str_replace("AREA", "ÁREA") %>% 
  str_replace("CRISTOBAL", "CRISTÓBAL") %>% 
  str_replace("BOMBONA", "BOMBONÁ") %>% 
  str_replace("LA ASOMADERA", "ASOMADERA") %>%
  str_replace("BELALCAZAR", "BELALCÁZAR") %>% 
  str_replace("CALAZANS", "CALASANZ") %>% 
  str_replace("COLON", "COLÓN") %>% 
  str_replace("MIRA FLORES", "MIRAFLORES") %>% 
  str_replace("BARRIO FACULTAD DE MINAS", "FACULTAD DE MINAS") %>% 
  str_replace("CABECERA SAN ANT DE PR.", "SAN ANTONIO DE PRADO") %>% 
  str_replace("CARLOS E RESTREPO", "CARLOS E. RESTREPO") %>% 
  str_replace("URQUITA", "URQUITÁ") %>% 
  str_replace("LOS CERROS EL VERJEL", "LOS CERROS EL VERGEL") %>% 
  str_replace("CAYCEDO", "CAICEDO") %>% 
  str_replace("VALDES", "VALDÉS") %>% 
  str_replace("CERRO EL VOLADOR", "B. CERRO EL VOLADOR") %>% 
  str_replace("MOSCU", "MOSCÚ") %>% 
  str_replace("JOSELA", "JOSÉ LA") %>%
  str_replace("JOSE", "JOSÉ") %>% 
  str_replace("EL YOLOMBO", "YOLOMBO") %>% 
  str_replace("PIEDRAS BLANCAS", "PIEDRAS BLANCAS - MATASANO") %>% 
  str_replace("BASILIA", "BRASILIA") %>% 
  str_replace("VILLA TINA", "VILLATINA") %>% 
  str_replace("LILIAM", "LILLIAM") %>% 
  str_replace("BOLIVAR", "BOLÍVAR") %>% 
  str_replace("CORREGIMIENTO PALMITAS", "PALMITAS SECTOR CENTRAL") %>% 
  str_replace("INES", "INÉS") %>% 
  str_replace("FE", "FÉ") %>% 
  str_replace("LUCIA", "LUCÍA") %>% 
  str_replace("SABIO", "SAVIO") %>% 
  str_replace("BERMEJAL- LOS ÁLAMOS", "BERMEJAL-LOS ÁLAMOS") %>% 
  str_replace("BOLÍVARIANA", "BOLIVARIANA") %>% 
  str_replace("EL NOGAL - LOS ALMENDROS", "EL NOGAL-LOS ALMENDROS") %>% 
  str_replace("JUAN XXIII - LA QUIEBRA", "JUAN XXIII LA QUIEBRA") %>% 
  str_replace("PROGRESO  Nº 2", "EL PROGRESO") %>% 
  str_replace("MARIA", "MARÍA") %>% 
  str_replace("PLAYÓN", "PLAYON") %>% 
  str_replace("EL SOCORRO / LA GABRIELA", "EL SOCORRO") %>% 
  str_replace("FÉRRINI", "FERRINI") %>% 
  str_replace("LA CANDE LARIA", "LA CANDELARIA") %>%
  str_replace("EL PLAYON", "PLAYÓN") %>%
  str_replace("IGUANA", "IGUANÁ") %>%
  str_replace("MARÍA CANO - CARAMBOLAS", "MARÍA CANO-CARAMBOLAS") %>%
  str_replace("DE ABURRA", "DEL ABURRÁ") %>%
  str_replace("ALTAVISTA CENTRAL", "ALTAVISTA SECTOR CENTRAL") %>%
  str_replace("SECTOR CENTRAL", "CENTRO ADMINISTRATIVO") %>%
  str_replace("ALTAVISTA CENTRO ADMINISTRATIVO", "ALTAVISTA SECTOR CENTRAL") %>%
  str_replace("SANTA ELENA CENTRO ADMINISTRATIVO", "SANTA ELENA SECTOR CENTRAL") %>%
  str_replace("PALMITAS CENTRO ADMINISTRATIVO", "PALMITAS SECTOR CENTRAL") %>%  
  str_replace("PROGRESO", "EL PROGRESO")

db_escolaridad <- db_escolaridad[!rownames(db_escolaridad) %in% c("DESCONOCIDO"), ]

Escritura de los datos

write_excel_csv2(db_escolaridad, "databases/db_escolaridad.csv")

Descripcion de las variables seleccionadas

Es importante considerar que la variable “edad_promedio” no necesariamente hace referencia a la dimensión de escolaridad, sin embargo, se quiere realizar un contraste entre la variable “edad_promedio” y las demás variables para extraer información y hacer validaciones empíricas.

Analisis preliminar de los datos

Medias, cuartiles y desviaciones estándar

summary(db_escolaridad)
##  edad_promedio   proporcion_lectoescritura proporcion_escolaridad_actual
##  Min.   :23.00   Min.   :0.6667            Min.   :0.1000               
##  1st Qu.:33.05   1st Qu.:0.8810            1st Qu.:0.2387               
##  Median :36.22   Median :0.9132            Median :0.2632               
##  Mean   :36.93   Mean   :0.9082            Mean   :0.2627               
##  3rd Qu.:40.83   3rd Qu.:0.9421            3rd Qu.:0.2886               
##  Max.   :58.25   Max.   :1.0000            Max.   :0.5000               
##  estudio_ultimo_ano proporcion_instituciones_publicas
##  Min.   :0.00000    Min.   :0.2561                   
##  1st Qu.:0.01581    1st Qu.:0.7306                   
##  Median :0.02212    Median :0.8857                   
##  Mean   :0.02307    Mean   :0.8159                   
##  3rd Qu.:0.02839    3rd Qu.:0.9438                   
##  Max.   :0.11111    Max.   :1.0000                   
##  proporcion_nivel_estudio_0 proporcion_nivel_estudio_1
##  Min.   :0.00000            Min.   :0.00000           
##  1st Qu.:0.07559            1st Qu.:0.06934           
##  Median :0.12000            Median :0.10727           
##  Mean   :0.12675            Mean   :0.11011           
##  3rd Qu.:0.16641            3rd Qu.:0.14314           
##  Max.   :0.45455            Max.   :0.25397           
##  proporcion_nivel_estudio_2 proporcion_nivel_estudio_3
##  Min.   :0.05263            Min.   :0.00000           
##  1st Qu.:0.18829            1st Qu.:0.06109           
##  Median :0.25012            Median :0.07904           
##  Mean   :0.23530            Mean   :0.07759           
##  3rd Qu.:0.28620            3rd Qu.:0.09483           
##  Max.   :0.52381            Max.   :0.25000           
##  proporcion_nivel_estudio_4 proporcion_nivel_estudio_5
##  Min.   :0.09091            Min.   :0.00000           
##  1st Qu.:0.21019            1st Qu.:0.03618           
##  Median :0.24883            Median :0.05035           
##  Mean   :0.24438            Mean   :0.04933           
##  3rd Qu.:0.27896            3rd Qu.:0.06202           
##  Max.   :0.50000            Max.   :0.13333           
##  proporcion_nivel_estudio_6 proporcion_nivel_estudio_7
##  Min.   :0.00000            Min.   :0.00000           
##  1st Qu.:0.01613            1st Qu.:0.02310           
##  Median :0.03077            Median :0.05581           
##  Mean   :0.03392            Mean   :0.09825           
##  3rd Qu.:0.05037            3rd Qu.:0.15127           
##  Max.   :0.10656            Max.   :0.36842           
##  proporcion_nivel_estudio_8 proporcion_nivel_estudio_9
##  Min.   :0.0000000          Min.   :0.0000000         
##  1st Qu.:0.0006139          1st Qu.:0.0000000         
##  Median :0.0044843          Median :0.0009911         
##  Mean   :0.0165995          Mean   :0.0063792         
##  3rd Qu.:0.0203735          3rd Qu.:0.0066922         
##  Max.   :0.1225364          Max.   :0.0727763         
##  proporcion_nivel_estudio_10
##  Min.   :0.000000           
##  1st Qu.:0.000000           
##  Median :0.000000           
##  Mean   :0.001378           
##  3rd Qu.:0.001115           
##  Max.   :0.024691

Desviaciones estándar

db_escolaridad %>% select_if(is.numeric) %>% 
  apply(2, sd)
##                     edad_promedio         proporcion_lectoescritura 
##                       5.422292368                       0.044803481 
##     proporcion_escolaridad_actual                estudio_ultimo_ano 
##                       0.046560206                       0.013229021 
## proporcion_instituciones_publicas        proporcion_nivel_estudio_0 
##                       0.178895882                       0.061424792 
##        proporcion_nivel_estudio_1        proporcion_nivel_estudio_2 
##                       0.050206840                       0.071695543 
##        proporcion_nivel_estudio_3        proporcion_nivel_estudio_4 
##                       0.027104839                       0.049277783 
##        proporcion_nivel_estudio_5        proporcion_nivel_estudio_6 
##                       0.020053459                       0.021604172 
##        proporcion_nivel_estudio_7        proporcion_nivel_estudio_8 
##                       0.099169964                       0.025807599 
##        proporcion_nivel_estudio_9       proporcion_nivel_estudio_10 
##                       0.011721795                       0.003258946

Dada la información sobre las medias arrojada para cada variable, hay que resaltar que la proporción de personas con habilidades lecto-escritoras es alta con un 0.9082309, la cual es una cifra positiva pues muestra que en la población no hay analfabetismo crítico.

Por otro lado, las proporción de personas que estudiaron en el último año tambien es baja, pero no se debe concluir que esto es necesariamente negativo. Cabe la posibilidad que varias personas en un determinado barrio sean trabajadores y por tanto no dedican mas tiempo al estudio a partir de cierto momento de su vida.

>>>>>>> CONCLUIR NIVEL DE ESTUDIO AQUI <<<<<<<

Graficas

Correlaciones y análisis de distribuciones

ggpairs(data = db_escolaridad, columns = 1:ncol(db_escolaridad), mapping = aes(alpha = 0.5))

De la gráfica anterior, se debe resaltar significativamente las correlaciones entre las variables “edad_promedio” con las variables “proporcion_lectoescritura” y “proporcion_escolaridad_actual”. Note que la “edad_promedio” esta correlacionada de manera directa con la variable “proporcion_lectoescritura” y de manera inversa con la variable “proporcion_escolaridad_actual”. Esta información que se obtiene coincide con el conocimiento epírico, pues por un lado, las personas con mayor edad tienen mas probabilidad de tener como mínimo una educación primaria, obteniendo así mas habilidades lecto-escritoras, mientras que por otro lado a medida que las personas envejecen dejan de educarse y pasan a ambientes mas laborales.

Por otro lado, note que en los barrios las personas tienen tendencia a educarse en establecimientos de índole pública debido a su fácil acceso.

Valores tipicos

ggplot(data = db_escolaridad) +
  geom_histogram(mapping = aes(x = proporcion_lectoescritura), binwidth = 0.002)

ggplot(data = db_escolaridad,
       mapping = aes(x = proporcion_escolaridad_actual)) +
  geom_histogram(binwidth = 0.002)

ggplot(data = db_escolaridad,
       mapping = aes(x = estudio_ultimo_ano)) +
  geom_histogram(binwidth = 0.0005)

Escalamiento de datos

db_escolaridad_escalado <- scale(db_escolaridad)

Aplicación de PCA PCA AQUI <==================================

Agrupamiento mediante K-means

Selección del \(K\) óptimo (Gráfica de codo)

k_maximo <- 15
datos <- db_escolaridad_escalado
wss <- sapply(1:k_maximo, 
              function(k) {
                kmeans(datos, k, nstart = 10, iter.max = 15 )$tot.withinss
              })

plot(1:k_maximo, wss,
     type="b", pch = 19, frame = FALSE, 
     xlab="Número de grupos [K]",
     ylab="Total de suma de cuadrados intra-grupos")

Agrupamiento con \(K\) óptimo

agrupamiento_kmeans <- kmeans(datos, centers = 7, nstart = 10, iter.max = 15 )

Agrupamiento Jerárquico

cantidad_grupos <- 7

distancia <- dist(db_escolaridad_escalado)
agrupamiento <- hclust(distancia, method = "complete")
arbol_corte <- cutree(agrupamiento, k = cantidad_grupos)

split_db_escolaridad <- split(db_escolaridad, arbol_corte)

Seleccion de los grupos

summary(split_db_escolaridad$`1`)
##  edad_promedio   proporcion_lectoescritura proporcion_escolaridad_actual
##  Min.   :23.00   Min.   :0.6667            Min.   :0.1961               
##  1st Qu.:31.17   1st Qu.:0.8621            1st Qu.:0.2606               
##  Median :33.33   Median :0.8857            Median :0.2836               
##  Mean   :32.94   Mean   :0.8791            Mean   :0.2848               
##  3rd Qu.:34.99   3rd Qu.:0.9027            3rd Qu.:0.3026               
##  Max.   :37.78   Max.   :0.9290            Max.   :0.4375               
##  estudio_ultimo_ano proporcion_instituciones_publicas
##  Min.   :0.00000    Min.   :0.7856                   
##  1st Qu.:0.01796    1st Qu.:0.9171                   
##  Median :0.02310    Median :0.9412                   
##  Mean   :0.02265    Mean   :0.9339                   
##  3rd Qu.:0.02798    3rd Qu.:0.9614                   
##  Max.   :0.06250    Max.   :1.0000                   
##  proporcion_nivel_estudio_0 proporcion_nivel_estudio_1
##  Min.   :0.09302            Min.   :0.07692           
##  1st Qu.:0.13414            1st Qu.:0.11999           
##  Median :0.15459            Median :0.13943           
##  Mean   :0.16411            Mean   :0.14665           
##  3rd Qu.:0.18569            3rd Qu.:0.16631           
##  Max.   :0.30000            Max.   :0.25397           
##  proporcion_nivel_estudio_2 proporcion_nivel_estudio_3
##  Min.   :0.1842             Min.   :0.00000           
##  1st Qu.:0.2677             1st Qu.:0.07759           
##  Median :0.2843             Median :0.08856           
##  Mean   :0.2842             Mean   :0.08752           
##  3rd Qu.:0.3039             3rd Qu.:0.09925           
##  Max.   :0.3600             Max.   :0.13235           
##  proporcion_nivel_estudio_4 proporcion_nivel_estudio_5
##  Min.   :0.1200             Min.   :0.00000           
##  1st Qu.:0.1987             1st Qu.:0.03102           
##  Median :0.2295             Median :0.04175           
##  Mean   :0.2244             Mean   :0.04200           
##  3rd Qu.:0.2528             3rd Qu.:0.05304           
##  Max.   :0.3280             Max.   :0.07579           
##  proporcion_nivel_estudio_6 proporcion_nivel_estudio_7
##  Min.   :0.00000            Min.   :0.00000           
##  1st Qu.:0.01016            1st Qu.:0.01084           
##  Median :0.01732            Median :0.02455           
##  Mean   :0.01947            Mean   :0.02835           
##  3rd Qu.:0.02632            3rd Qu.:0.04026           
##  Max.   :0.05738            Max.   :0.16667           
##  proporcion_nivel_estudio_8 proporcion_nivel_estudio_9
##  Min.   :0.000000           Min.   :0.0000000         
##  1st Qu.:0.000000           1st Qu.:0.0000000         
##  Median :0.001361           Median :0.0000000         
##  Mean   :0.002271           Mean   :0.0008975         
##  3rd Qu.:0.003512           3rd Qu.:0.0008881         
##  Max.   :0.013568           Max.   :0.0400000         
##  proporcion_nivel_estudio_10
##  Min.   :0.0000000          
##  1st Qu.:0.0000000          
##  Median :0.0000000          
##  Mean   :0.0001344          
##  3rd Qu.:0.0000000          
##  Max.   :0.0027972
summary(split_db_escolaridad$`6`)
##  edad_promedio   proporcion_lectoescritura proporcion_escolaridad_actual
##  Min.   :58.25   Min.   :1                 Min.   :0.25                 
##  1st Qu.:58.25   1st Qu.:1                 1st Qu.:0.25                 
##  Median :58.25   Median :1                 Median :0.25                 
##  Mean   :58.25   Mean   :1                 Mean   :0.25                 
##  3rd Qu.:58.25   3rd Qu.:1                 3rd Qu.:0.25                 
##  Max.   :58.25   Max.   :1                 Max.   :0.25                 
##  estudio_ultimo_ano proporcion_instituciones_publicas
##  Min.   :0          Min.   :0.6667                   
##  1st Qu.:0          1st Qu.:0.6667                   
##  Median :0          Median :0.6667                   
##  Mean   :0          Mean   :0.6667                   
##  3rd Qu.:0          3rd Qu.:0.6667                   
##  Max.   :0          Max.   :0.6667                   
##  proporcion_nivel_estudio_0 proporcion_nivel_estudio_1
##  Min.   :0.25               Min.   :0                 
##  1st Qu.:0.25               1st Qu.:0                 
##  Median :0.25               Median :0                 
##  Mean   :0.25               Mean   :0                 
##  3rd Qu.:0.25               3rd Qu.:0                 
##  Max.   :0.25               Max.   :0                 
##  proporcion_nivel_estudio_2 proporcion_nivel_estudio_3
##  Min.   :0.25               Min.   :0.25              
##  1st Qu.:0.25               1st Qu.:0.25              
##  Median :0.25               Median :0.25              
##  Mean   :0.25               Mean   :0.25              
##  3rd Qu.:0.25               3rd Qu.:0.25              
##  Max.   :0.25               Max.   :0.25              
##  proporcion_nivel_estudio_4 proporcion_nivel_estudio_5
##  Min.   :0.25               Min.   :0                 
##  1st Qu.:0.25               1st Qu.:0                 
##  Median :0.25               Median :0                 
##  Mean   :0.25               Mean   :0                 
##  3rd Qu.:0.25               3rd Qu.:0                 
##  Max.   :0.25               Max.   :0                 
##  proporcion_nivel_estudio_6 proporcion_nivel_estudio_7
##  Min.   :0                  Min.   :0                 
##  1st Qu.:0                  1st Qu.:0                 
##  Median :0                  Median :0                 
##  Mean   :0                  Mean   :0                 
##  3rd Qu.:0                  3rd Qu.:0                 
##  Max.   :0                  Max.   :0                 
##  proporcion_nivel_estudio_8 proporcion_nivel_estudio_9
##  Min.   :0                  Min.   :0                 
##  1st Qu.:0                  1st Qu.:0                 
##  Median :0                  Median :0                 
##  Mean   :0                  Mean   :0                 
##  3rd Qu.:0                  3rd Qu.:0                 
##  Max.   :0                  Max.   :0                 
##  proporcion_nivel_estudio_10
##  Min.   :0                  
##  1st Qu.:0                  
##  Median :0                  
##  Mean   :0                  
##  3rd Qu.:0                  
##  Max.   :0

Mapa geográfico usando el agrupamiento (agrupamiento jerárquico)

political <- shapefile("Barrio_Vereda/Barrio_Vereda.shp")

Encoding(political@data$NOMBRE) <- "UTF-8"
political$NOMBRE <- political$NOMBRE %>% toupper() %>% str_replace("DE  MESA", "DE MESA")

leaflet(data = political) %>% 
  addTiles() %>% 
  addProviderTiles(providers$OpenStreetMap) %>% 
  addPolygons(fill = TRUE, stroke = TRUE, weight = 2, color = "#03F", 
              label = as.character(political$NOMBRE),
              popup = as.character(political$NOMBRE)) %>% 
  addLegend("bottomright", colors = "#03F", labels = "Barrios y veredas")
nombres_mapa <- political$NOMBRE %>% sort()

interseccion <- nombres_mapa %>% 
  intersect(rownames(db_escolaridad))

no_coinciden <- rownames(db_escolaridad)[!(rownames(db_escolaridad) %in% interseccion)]
no_coinciden
## [1] "CABECERA SAN CRISTÓBAL"    "CIUDADELA NUEVO OCCIDENTE"
## [3] "EL PROGRESO  NO.2"
rownames(db_escolaridad)
##   [1] "AGUAS FRÍAS"                           
##   [2] "ALDEA PABLO VI"                        
##   [3] "ALEJANDRÍA"                            
##   [4] "ALEJANDRO ECHAVARRÍA"                  
##   [5] "ALFONSO LÓPEZ"                         
##   [6] "ALTAMIRA"                              
##   [7] "ALTAVISTA"                             
##   [8] "ALTAVISTA SECTOR CENTRAL"              
##   [9] "ALTOS DEL POBLADO"                     
##  [10] "ANDALUCÍA"                             
##  [11] "ANTONIO NARIÑO"                        
##  [12] "ARANJUEZ"                              
##  [13] "ÁREA DE EXPANSIÓN SAN CRISTÓBAL"       
##  [14] "ÁREA DE EXPANSIÓN ALTAVISTA"           
##  [15] "ÁREA DE EXPANSIÓN BELÉN RINCÓN"        
##  [16] "ÁREA DE EXPANSIÓN PAJARITO"            
##  [17] "ÁREA DE EXPANSIÓN SAN ANTONIO DE PRADO"
##  [18] "ASTORGA"                               
##  [19] "AURES NO.1"                            
##  [20] "AURES NO.2"                            
##  [21] "BARRIO CAICEDO"                        
##  [22] "BARRIO COLOMBIA"                       
##  [23] "BARRIO COLÓN"                          
##  [24] "BARRIO CRISTÓBAL"                      
##  [25] "FACULTAD DE MINAS"                     
##  [26] "BARRIOS DE JESÚS"                      
##  [27] "BARRO BLANCO"                          
##  [28] "BRASILIA"                              
##  [29] "BATALLÓN GIRARDOT"                     
##  [30] "BELALCÁZAR"                            
##  [31] "BELÉN"                                 
##  [32] "BELENCITO"                             
##  [33] "BELLO HORIZONTE"                       
##  [34] "BERLÍN"                                
##  [35] "BERMEJAL-LOS ÁLAMOS"                   
##  [36] "BETANIA"                               
##  [37] "BLANQUIZAL"                            
##  [38] "BOLIVARIANA"                           
##  [39] "BOMBONÁ NO.1"                          
##  [40] "BOMBONÁ NO.2"                          
##  [41] "BOQUERÓN"                              
##  [42] "BOSQUES DE SAN PABLO"                  
##  [43] "BOSTON"                                
##  [44] "BOYACÁ"                                
##  [45] "BUENOS AIRES"                          
##  [46] "BUGA PATIO BONITO"                     
##  [47] "SAN ANTONIO DE PRADO"                  
##  [48] "CABECERA SAN CRISTÓBAL"                
##  [49] "CALASANZ"                              
##  [50] "CALASANZ PARTE ALTA"                   
##  [51] "CAMPO ALEGRE"                          
##  [52] "CAMPO AMOR"                            
##  [53] "CAMPO VALDÉS NO.1"                     
##  [54] "CAMPO VALDÉS NO.2"                     
##  [55] "CARIBE"                                
##  [56] "CARLOS E. RESTREPO"                    
##  [57] "CARPINELO"                             
##  [58] "CASTILLA"                              
##  [59] "CASTROPOL"                             
##  [60] "CATALUÑA"                              
##  [61] "B. CERRO EL VOLADOR"                   
##  [62] "CERRO NUTIBARA"                        
##  [63] "CIUDADELA NUEVO OCCIDENTE"             
##  [64] "CORAZÓN DE JESÚS"                      
##  [65] "CÓRDOBA"                               
##  [66] "PALMITAS SECTOR CENTRAL"               
##  [67] "CRISTO REY"                            
##  [68] "CUARTA BRIGADA"                        
##  [69] "CUCARACHO"                             
##  [70] "DIEGO ECHAVARRÍA"                      
##  [71] "DOCE DE OCTUBRE NO.1"                  
##  [72] "DOCE DE OCTUBRE NO.2"                  
##  [73] "EDUARDO SANTOS"                        
##  [74] "EL ASTILLERO"                          
##  [75] "EL CARMELO"                            
##  [76] "EL CASTILLO"                           
##  [77] "EL CERRO"                              
##  [78] "EL CHAGUALO"                           
##  [79] "EL COMPROMISO"                         
##  [80] "EL CORAZÓN"                            
##  [81] "EL CORAZÓN EL MORRO"                   
##  [82] "EL DANUBIO"                            
##  [83] "EL DIAMANTE"                           
##  [84] "EL DIAMANTE NO.2"                      
##  [85] "EL JARDÍN"                             
##  [86] "EL LLANO"                              
##  [87] "EL NOGAL-LOS ALMENDROS"                
##  [88] "EL PATIO"                              
##  [89] "EL PESEBRE"                            
##  [90] "EL PICACHO"                            
##  [91] "EL PINAL"                              
##  [92] "EL PLACER"                             
##  [93] "EL PLAN"                               
##  [94] "PLAYÓN DE LOS COMUNEROS"               
##  [95] "EL POBLADO"                            
##  [96] "EL POMAR"                              
##  [97] "EL RAIZAL"                             
##  [98] "EL RINCÓN"                             
##  [99] "EL SALADO"                             
## [100] "EL SALVADOR"                           
## [101] "EL SOCORRO"                            
## [102] "EL TESORO"                             
## [103] "EL TRIUNFO"                            
## [104] "EL UVITO"                              
## [105] "EL VELÓDROMO"                          
## [106] "YOLOMBO"                               
## [107] "ENCISO"                                
## [108] "ESTACIÓN VILLA"                        
## [109] "ESTADIO"                               
## [110] "FÁTIMA"                                
## [111] "FERRINI"                               
## [112] "FLORENCIA"                             
## [113] "FLORIDA NUEVA"                         
## [114] "FRANCISCO ANTONIO ZEA"                 
## [115] "FUENTE CLARA"                          
## [116] "GERONA"                                
## [117] "GIRARDOT"                              
## [118] "GRANADA"                               
## [119] "GRANIZAL"                              
## [120] "GUAYABAL"                              
## [121] "GUAYAQUIL"                             
## [122] "HÉCTOR ABAD GÓMEZ"                     
## [123] "JESÚS NAZARENO"                        
## [124] "JUAN PABLO II"                         
## [125] "JUAN XXIII LA QUIEBRA"                 
## [126] "KENNEDY"                               
## [127] "LA AGUACATALA"                         
## [128] "LA ALDEA"                              
## [129] "LA AMÉRICA"                            
## [130] "ASOMADERA NO.1"                        
## [131] "ASOMADERA NO.2"                        
## [132] "ASOMADERA NO.3"                        
## [133] "LA AVANZADA"                           
## [134] "LA CANDELARIA"                         
## [135] "LA CASTELLANA"                         
## [136] "LA COLINA"                             
## [137] "LA CRUZ"                               
## [138] "LA CUCHILLA"                           
## [139] "LA ESPERANZA"                          
## [140] "LA ESPERANZA NO.2"                     
## [141] "LA FLORESTA"                           
## [142] "LA FLORIDA"                            
## [143] "LA FRANCIA"                            
## [144] "LA FRISOLA"                            
## [145] "LA FRONTERA"                           
## [146] "LA GLORIA"                             
## [147] "LA HONDONADA"                          
## [148] "LA ILUSIÓN"                            
## [149] "LA ISLA"                               
## [150] "LA LADERA"                             
## [151] "LA LIBERTAD"                           
## [152] "LA LOMA"                               
## [153] "LA LOMA DE LOS BERNAL"                 
## [154] "LA MANSIÓN"                            
## [155] "LA MILAGROSA"                          
## [156] "LA MOTA"                               
## [157] "LA PALMA"                              
## [158] "LA PILARICA"                           
## [159] "LA PIÑUELA"                            
## [160] "LA PRADERA"                            
## [161] "LA ROSA"                               
## [162] "LA SALLE"                              
## [163] "LA SIERRA"                             
## [164] "LA SUCIA"                              
## [165] "LA SUIZA"                              
## [166] "LA VERDE"                              
## [167] "LALINDE"                               
## [168] "LAS ACACIAS"                           
## [169] "LAS BRISAS"                            
## [170] "LAS ESMERALDAS"                        
## [171] "LAS ESTANCIAS"                         
## [172] "LAS GRANJAS"                           
## [173] "LAS INDEPENDENCIAS"                    
## [174] "LAS LOMAS NO.1"                        
## [175] "LAS LOMAS NO.2"                        
## [176] "LAS MERCEDES"                          
## [177] "LAS PALMAS"                            
## [178] "LAS PLAYAS"                            
## [179] "LAS VIOLETAS"                          
## [180] "LAURELES"                              
## [181] "LLANADITAS"                            
## [182] "LÓPEZ DE MESA"                         
## [183] "LORENA"                                
## [184] "LORETO"                                
## [185] "LOS ALCÁZARES"                         
## [186] "LOS ALPES"                             
## [187] "LOS ÁNGELES"                           
## [188] "LOS BALSOS NO.1"                       
## [189] "LOS BALSOS NO.2"                       
## [190] "LOS CERROS EL VERGEL"                  
## [191] "LOS COLORES"                           
## [192] "LOS CONQUISTADORES"                    
## [193] "LOS MANGOS"                            
## [194] "LOS NARANJOS"                          
## [195] "LOS PINOS"                             
## [196] "MANILA"                                
## [197] "MANRIQUE CENTRAL NO.1"                 
## [198] "MANRIQUE CENTRAL NO.2"                 
## [199] "MANRIQUE ORIENTAL"                     
## [200] "MARÍA CANO-CARAMBOLAS"                 
## [201] "MAZO"                                  
## [202] "MEDIA LUNA"                            
## [203] "METROPOLITANO"                         
## [204] "MIRAFLORES"                            
## [205] "MIRADOR DEL DOCE"                      
## [206] "MIRANDA"                               
## [207] "MIRAVALLE"                             
## [208] "MONTAÑITA"                             
## [209] "MONTECLARO"                            
## [210] "MORAVIA"                               
## [211] "MOSCÚ NO.1"                            
## [212] "MOSCÚ NO.2"                            
## [213] "NARANJAL"                              
## [214] "NUEVA VILLA DEL ABURRÁ"                
## [215] "NUEVA VILLA DE LA IGUANÁ"              
## [216] "NUEVOS CONQUISTADORES"                 
## [217] "OCHO DE MARZO"                         
## [218] "OLAYA HERRERA"                         
## [219] "ORIENTE"                               
## [220] "PABLO VI"                              
## [221] "PAJARITO"                              
## [222] "PALENQUE"                              
## [223] "PALERMO"                               
## [224] "PATIO BONITO"                          
## [225] "PEDREGAL"                              
## [226] "PEDREGAL ALTO"                         
## [227] "PICACHITO"                             
## [228] "PICACHO"                               
## [229] "PIEDRA GORDA"                          
## [230] "PIEDRAS BLANCAS - MATASANO"            
## [231] "POPULAR"                               
## [232] "POTRERA MISERENGA"                     
## [233] "POTRERITO"                             
## [234] "PRADO"                                 
## [235] "EL PROGRESO"                           
## [236] "EL PROGRESO  NO.2"                     
## [237] "ROBLEDO"                               
## [238] "ROSALES"                               
## [239] "SAN ANTONIO"                           
## [240] "SAN BENITO"                            
## [241] "SAN BERNARDO"                          
## [242] "SAN DIEGO"                             
## [243] "SAN GERMÁN"                            
## [244] "SAN ISIDRO"                            
## [245] "SAN JAVIER NO.1"                       
## [246] "SAN JAVIER NO.2"                       
## [247] "SAN JOAQUÍN"                           
## [248] "SAN JOSÉ"                              
## [249] "SAN JOSÉ DE LA MONTAÑA"                
## [250] "SAN JOSÉ DEL MANZANILLO"               
## [251] "SAN JOSÉ LA CIMA NO.2"                 
## [252] "SAN JOSÉ LA CIMA NO.1"                 
## [253] "SAN LUCAS"                             
## [254] "SAN MARTÍN DE PORRES"                  
## [255] "SAN MIGUEL"                            
## [256] "SAN PABLO"                             
## [257] "SAN PEDRO"                             
## [258] "SANTA CRUZ"                            
## [259] "SANTA ELENA SECTOR CENTRAL"            
## [260] "SANTA FÉ"                              
## [261] "SANTA INÉS"                            
## [262] "SANTA LUCÍA"                           
## [263] "SANTA MARGARITA"                       
## [264] "SANTA MARÍA DE LOS ÁNGELES"            
## [265] "SANTA MÓNICA"                          
## [266] "SANTA ROSA DE LIMA"                    
## [267] "SANTA TERESITA"                        
## [268] "SANTANDER"                             
## [269] "SANTO DOMINGO SAVIO NO.1"              
## [270] "SANTO DOMINGO SAVIO NO.2"              
## [271] "CENTRO ADMINISTRATIVO"                 
## [272] "SEVILLA"                               
## [273] "SIMÓN BOLÍVAR"                         
## [274] "SUCRE"                                 
## [275] "SURAMERICANA"                          
## [276] "TEJELO"                                
## [277] "TOSCANA"                               
## [278] "TRAVESÍAS"                             
## [279] "TRECE DE NOVIEMBRE"                    
## [280] "TRICENTENARIO"                         
## [281] "TRINIDAD"                              
## [282] "URQUITÁ"                               
## [283] "VEINTE DE JULIO"                       
## [284] "VERSALLES NO.1"                        
## [285] "VERSALLES NO.2"                        
## [286] "VILLA CARLOTA"                         
## [287] "VILLA DEL SOCORRO"                     
## [288] "VILLA FLORA"                           
## [289] "VILLA GUADALUPE"                       
## [290] "VILLA HERMOSA"                         
## [291] "VILLA LILLIAM"                         
## [292] "VILLA NIZA"                            
## [293] "VILLA NUEVA"                           
## [294] "VILLATINA"                             
## [295] "VILLA TURBAY"                          
## [296] "VOLCANA GUAYABAL"                      
## [297] "YARUMALITO"
nombres_mapa
##   [1] "AGUAS FRÍAS"                                
##   [2] "ALDEA PABLO VI"                             
##   [3] "ALEJANDRÍA"                                 
##   [4] "ALEJANDRO ECHAVARRÍA"                       
##   [5] "ALFONSO LÓPEZ"                              
##   [6] "ALTAMIRA"                                   
##   [7] "ALTAVISTA"                                  
##   [8] "ALTAVISTA SECTOR CENTRAL"                   
##   [9] "ALTOS DEL POBLADO"                          
##  [10] "ANDALUCÍA"                                  
##  [11] "ANTONIO NARIÑO"                             
##  [12] "ARANJUEZ"                                   
##  [13] "ÁREA DE EXPANSIÓN ALTAVISTA"                
##  [14] "ÁREA DE EXPANSIÓN BELÉN RINCÓN"             
##  [15] "ÁREA DE EXPANSIÓN EL NORAL"                 
##  [16] "ÁREA DE EXPANSIÓN PAJARITO"                 
##  [17] "ÁREA DE EXPANSIÓN SAN ANTONIO DE PRADO"     
##  [18] "ÁREA DE EXPANSIÓN SAN CRISTÓBAL"            
##  [19] "ASOMADERA NO.1"                             
##  [20] "ASOMADERA NO.2"                             
##  [21] "ASOMADERA NO.3"                             
##  [22] "ASTORGA"                                    
##  [23] "AURES NO.1"                                 
##  [24] "AURES NO.2"                                 
##  [25] "B. CERRO EL VOLADOR"                        
##  [26] "BARRIO CAICEDO"                             
##  [27] "BARRIO COLOMBIA"                            
##  [28] "BARRIO COLÓN"                               
##  [29] "BARRIO CRISTÓBAL"                           
##  [30] "BARRIOS DE JESÚS"                           
##  [31] "BARRO BLANCO"                               
##  [32] "BATALLÓN CUARTA BRIGADA"                    
##  [33] "BATALLÓN GIRARDOT"                          
##  [34] "BELALCÁZAR"                                 
##  [35] "BELÉN"                                      
##  [36] "BELENCITO"                                  
##  [37] "BELLO HORIZONTE"                            
##  [38] "BERLÍN"                                     
##  [39] "BERMEJAL-LOS ÁLAMOS"                        
##  [40] "BETANIA"                                    
##  [41] "BLANQUIZAL"                                 
##  [42] "BOLIVARIANA"                                
##  [43] "BOMBONÁ NO.1"                               
##  [44] "BOMBONÁ NO.2"                               
##  [45] "BOQUERÓN"                                   
##  [46] "BOSQUES DE SAN PABLO"                       
##  [47] "BOSTON"                                     
##  [48] "BOYACÁ"                                     
##  [49] "BRASILIA"                                   
##  [50] "BUENOS AIRES"                               
##  [51] "BUGA PATIO BONITO"                          
##  [52] "CABECERA URBANA CORREGIMIENTO SAN CRISTÓBAL"
##  [53] "CALASANZ"                                   
##  [54] "CALASANZ PARTE ALTA"                        
##  [55] "CALLE NUEVA"                                
##  [56] "CAMPO ALEGRE"                               
##  [57] "CAMPO AMOR"                                 
##  [58] "CAMPO VALDÉS NO.1"                          
##  [59] "CAMPO VALDÉS NO.2"                          
##  [60] "CARIBE"                                     
##  [61] "CARLOS E. RESTREPO"                         
##  [62] "CARPINELO"                                  
##  [63] "CASTILLA"                                   
##  [64] "CASTROPOL"                                  
##  [65] "CATALUÑA"                                   
##  [66] "CEMENTERIO UNIVERSAL"                       
##  [67] "CENTRO ADMINISTRATIVO"                      
##  [68] "CERRO NUTIBARA"                             
##  [69] "CERRO NUTIBARA"                             
##  [70] "CORAZÓN DE JESÚS"                           
##  [71] "CÓRDOBA"                                    
##  [72] "CRISTO REY"                                 
##  [73] "CUARTA BRIGADA"                             
##  [74] "CUCARACHO"                                  
##  [75] "DIEGO ECHAVARRÍA"                           
##  [76] "DOCE DE OCTUBRE NO.1"                       
##  [77] "DOCE DE OCTUBRE NO.2"                       
##  [78] "ECOPARQUE CERRO EL VOLADOR"                 
##  [79] "EDUARDO SANTOS"                             
##  [80] "EDUARDO SANTOS"                             
##  [81] "EL ASTILLERO"                               
##  [82] "EL CARMELO"                                 
##  [83] "EL CASTILLO"                                
##  [84] "EL CERRO"                                   
##  [85] "EL CHAGUALO"                                
##  [86] "EL COMPROMISO"                              
##  [87] "EL CORAZÓN"                                 
##  [88] "EL CORAZÓN EL MORRO"                        
##  [89] "EL DANUBIO"                                 
##  [90] "EL DIAMANTE"                                
##  [91] "EL DIAMANTE NO.2"                           
##  [92] "EL JARDÍN"                                  
##  [93] "EL LLANO"                                   
##  [94] "EL LLANO SE"                                
##  [95] "EL NOGAL-LOS ALMENDROS"                     
##  [96] "EL PATIO"                                   
##  [97] "EL PESEBRE"                                 
##  [98] "EL PICACHO"                                 
##  [99] "EL PINAL"                                   
## [100] "EL PLACER"                                  
## [101] "EL PLAN"                                    
## [102] "EL POBLADO"                                 
## [103] "EL POMAR"                                   
## [104] "EL PROGRESO"                                
## [105] "EL RAIZAL"                                  
## [106] "EL RINCÓN"                                  
## [107] "EL RODEO"                                   
## [108] "EL SALADO"                                  
## [109] "EL SALADO"                                  
## [110] "EL SALVADOR"                                
## [111] "EL SOCORRO"                                 
## [112] "EL TESORO"                                  
## [113] "EL TRIUNFO"                                 
## [114] "EL UVITO"                                   
## [115] "EL VELÓDROMO"                               
## [116] "ENCISO"                                     
## [117] "ESTACIÓN VILLA"                             
## [118] "ESTADIO"                                    
## [119] "FACULTAD DE MINAS"                          
## [120] "FACULTAD DE MINAS U. NACIONAL"              
## [121] "FACULTAD VETERINARIA Y ZOOTECNIA U.DE.A."   
## [122] "FÁTIMA"                                     
## [123] "FERRINI"                                    
## [124] "FLORENCIA"                                  
## [125] "FLORIDA NUEVA"                              
## [126] "FRANCISCO ANTONIO ZEA"                      
## [127] "FUENTE CLARA"                               
## [128] "GERONA"                                     
## [129] "GIRARDOT"                                   
## [130] "GRANADA"                                    
## [131] "GRANIZAL"                                   
## [132] "GUAYABAL"                                   
## [133] "GUAYAQUIL"                                  
## [134] "HÉCTOR ABAD GÓMEZ"                          
## [135] "HOSPITAL SAN VICENTE DE PAÚL"               
## [136] "JARDÍN BOTÁNICO"                            
## [137] "JESÚS NAZARENO"                             
## [138] "JUAN PABLO II"                              
## [139] "JUAN XXIII LA QUIEBRA"                      
## [140] "KENNEDY"                                    
## [141] "LA AGUACATALA"                              
## [142] "LA ALDEA"                                   
## [143] "LA ALPUJARRA"                               
## [144] "LA AMÉRICA"                                 
## [145] "LA AVANZADA"                                
## [146] "LA CANDELARIA"                              
## [147] "LA CASTELLANA"                              
## [148] "LA COLINA"                                  
## [149] "LA CRUZ"                                    
## [150] "LA CUCHILLA"                                
## [151] "LA ESPERANZA"                               
## [152] "LA ESPERANZA"                               
## [153] "LA ESPERANZA NO.2"                          
## [154] "LA FLORESTA"                                
## [155] "LA FLORIDA"                                 
## [156] "LA FLORIDA"                                 
## [157] "LA FRANCIA"                                 
## [158] "LA FRISOLA"                                 
## [159] "LA FRONTERA"                                
## [160] "LA GLORIA"                                  
## [161] "LA HONDONADA"                               
## [162] "LA ILUSIÓN"                                 
## [163] "LA ISLA"                                    
## [164] "LA LADERA"                                  
## [165] "LA LIBERTAD"                                
## [166] "LA LOMA"                                    
## [167] "LA LOMA DE LOS BERNAL"                      
## [168] "LA MANSIÓN"                                 
## [169] "LA MILAGROSA"                               
## [170] "LA MOTA"                                    
## [171] "LA PALMA"                                   
## [172] "LA PALMA"                                   
## [173] "LA PILARICA"                                
## [174] "LA PIÑUELA"                                 
## [175] "LA PRADERA"                                 
## [176] "LA ROSA"                                    
## [177] "LA SALLE"                                   
## [178] "LA SIERRA"                                  
## [179] "LA SUCIA"                                   
## [180] "LA SUIZA"                                   
## [181] "LA VERDE"                                   
## [182] "LALINDE"                                    
## [183] "LAS ACACIAS"                                
## [184] "LAS BRISAS"                                 
## [185] "LAS ESMERALDAS"                             
## [186] "LAS ESTANCIAS"                              
## [187] "LAS GRANJAS"                                
## [188] "LAS INDEPENDENCIAS"                         
## [189] "LAS LOMAS NO.1"                             
## [190] "LAS LOMAS NO.2"                             
## [191] "LAS MERCEDES"                               
## [192] "LAS PALMAS"                                 
## [193] "LAS PALMAS"                                 
## [194] "LAS PLAYAS"                                 
## [195] "LAS PLAYAS"                                 
## [196] "LAS VIOLETAS"                               
## [197] "LAURELES"                                   
## [198] "LLANADITAS"                                 
## [199] "LÓPEZ DE MESA"                              
## [200] "LORENA"                                     
## [201] "LORETO"                                     
## [202] "LOS ALCÁZARES"                              
## [203] "LOS ALPES"                                  
## [204] "LOS ÁNGELES"                                
## [205] "LOS BALSOS NO.1"                            
## [206] "LOS BALSOS NO.2"                            
## [207] "LOS CERROS EL VERGEL"                       
## [208] "LOS COLORES"                                
## [209] "LOS CONQUISTADORES"                         
## [210] "LOS MANGOS"                                 
## [211] "LOS NARANJOS"                               
## [212] "LOS PINOS"                                  
## [213] "MANILA"                                     
## [214] "MANRIQUE CENTRAL NO.1"                      
## [215] "MANRIQUE CENTRAL NO.2"                      
## [216] "MANRIQUE ORIENTAL"                          
## [217] "MARÍA CANO-CARAMBOLAS"                      
## [218] "MAZO"                                       
## [219] "MEDIA LUNA"                                 
## [220] "METROPOLITANO"                              
## [221] "MIRADOR DEL DOCE"                           
## [222] "MIRAFLORES"                                 
## [223] "MIRANDA"                                    
## [224] "MIRAVALLE"                                  
## [225] "MONTAÑITA"                                  
## [226] "MONTECLARO"                                 
## [227] "MORAVIA"                                    
## [228] "MOSCÚ NO.1"                                 
## [229] "MOSCÚ NO.2"                                 
## [230] "NARANJAL"                                   
## [231] "NARANJAL"                                   
## [232] "NUEVA VILLA DE LA IGUANÁ"                   
## [233] "NUEVA VILLA DEL ABURRÁ"                     
## [234] "NUEVOS CONQUISTADORES"                      
## [235] "OCHO DE MARZO"                              
## [236] "OLAYA HERRERA"                              
## [237] "OLEODUCTO"                                  
## [238] "ORIENTE"                                    
## [239] "PABLO VI"                                   
## [240] "PAJARITO"                                   
## [241] "PAJARITO"                                   
## [242] "PALENQUE"                                   
## [243] "PALERMO"                                    
## [244] "PALMITAS SECTOR CENTRAL"                    
## [245] "PARQUE JUAN PABLO II"                       
## [246] "PARQUE NORTE"                               
## [247] "PATIO BONITO"                               
## [248] "PEDREGAL"                                   
## [249] "PEDREGAL ALTO"                              
## [250] "PERPETUO SOCORRO"                           
## [251] "PICACHITO"                                  
## [252] "PICACHO"                                    
## [253] "PIEDRA GORDA"                               
## [254] "PIEDRAS BLANCAS - MATASANO"                 
## [255] "PLAYÓN DE LOS COMUNEROS"                    
## [256] "PLAZA DE FERIAS"                            
## [257] "POPULAR"                                    
## [258] "POTRERA MISERENGA"                          
## [259] "POTRERITO"                                  
## [260] "PRADO"                                      
## [261] "PROGRESO NO.2"                              
## [262] "ROBLEDO"                                    
## [263] "ROSALES"                                    
## [264] "SAN ANTONIO"                                
## [265] "SAN ANTONIO DE PRADO"                       
## [266] "SAN BENITO"                                 
## [267] "SAN BERNARDO"                               
## [268] "SAN DIEGO"                                  
## [269] "SAN GERMÁN"                                 
## [270] "SAN ISIDRO"                                 
## [271] "SAN JAVIER NO.1"                            
## [272] "SAN JAVIER NO.2"                            
## [273] "SAN JOAQUÍN"                                
## [274] "SAN JOSÉ"                                   
## [275] "SAN JOSÉ DE LA MONTAÑA"                     
## [276] "SAN JOSÉ DEL MANZANILLO"                    
## [277] "SAN JOSÉ LA CIMA NO.1"                      
## [278] "SAN JOSÉ LA CIMA NO.2"                      
## [279] "SAN LUCAS"                                  
## [280] "SAN MARTÍN DE PORRES"                       
## [281] "SAN MIGUEL"                                 
## [282] "SAN PABLO"                                  
## [283] "SAN PABLO"                                  
## [284] "SAN PEDRO"                                  
## [285] "SANTA CRUZ"                                 
## [286] "SANTA ELENA SECTOR CENTRAL"                 
## [287] "SANTA FÉ"                                   
## [288] "SANTA INÉS"                                 
## [289] "SANTA LUCÍA"                                
## [290] "SANTA MARGARITA"                            
## [291] "SANTA MARÍA DE LOS ÁNGELES"                 
## [292] "SANTA MÓNICA"                               
## [293] "SANTA ROSA DE LIMA"                         
## [294] "SANTA TERESITA"                             
## [295] "SANTANDER"                                  
## [296] "SANTO DOMINGO SAVIO NO.1"                   
## [297] "SANTO DOMINGO SAVIO NO.2"                   
## [298] "SEVILLA"                                    
## [299] "SIMÓN BOLÍVAR"                              
## [300] "SIN NOMBRE"                                 
## [301] "SIN NOMBRE"                                 
## [302] "SUCRE"                                      
## [303] "SURAMERICANA"                               
## [304] "TEJELO"                                     
## [305] "TENCHE"                                     
## [306] "TERMINAL DE TRANSPORTE"                     
## [307] "TOSCANA"                                    
## [308] "TRAVESÍAS"                                  
## [309] "TRECE DE NOVIEMBRE"                         
## [310] "TRICENTENARIO"                              
## [311] "TRINIDAD"                                   
## [312] "U.D. ATANASIO GIRARDOT"                     
## [313] "U.P.B"                                      
## [314] "UNIVERSIDAD DE ANTIOQUIA"                   
## [315] "UNIVERSIDAD NACIONAL"                       
## [316] "URQUITÁ"                                    
## [317] "VEINTE DE JULIO"                            
## [318] "VERSALLES NO.1"                             
## [319] "VERSALLES NO.2"                             
## [320] "VILLA CARLOTA"                              
## [321] "VILLA DEL SOCORRO"                          
## [322] "VILLA FLORA"                                
## [323] "VILLA GUADALUPE"                            
## [324] "VILLA HERMOSA"                              
## [325] "VILLA LILLIAM"                              
## [326] "VILLA NIZA"                                 
## [327] "VILLA NUEVA"                                
## [328] "VILLA TURBAY"                               
## [329] "VILLATINA"                                  
## [330] "VOLCANA GUAYABAL"                           
## [331] "YARUMALITO"                                 
## [332] "YOLOMBO"
agrupamiento <- raw_encuesta %>% 
  group_by(encuesta_calidad.barrio) %>% 
  summarise(n = n())

agrupamiento$encuesta_calidad.barrio
##   [1] "AGUAS FRÍAS"                        
##   [2] "ALDEA PABLO VI"                     
##   [3] "ALEJANDRÍA"                         
##   [4] "ALEJANDRO ECHAVARRÍA"               
##   [5] "ALFONSO LÓPEZ"                      
##   [6] "ALTAMIRA"                           
##   [7] "ALTAVISTA"                          
##   [8] "ALTAVISTA CENTRAL"                  
##   [9] "ALTOS DEL POBLADO"                  
##  [10] "ANDALUCIA"                          
##  [11] "ANTONIO NARIÑO"                     
##  [12] "ARANJUEZ"                           
##  [13] "AREA DE EXPANCION SAN CRISTOBAL"    
##  [14] "ÁREA DE EXPANSIÓN ALTAVISTA"        
##  [15] "ÁREA DE EXPANSIÓN BELÉN RINCÓN"     
##  [16] "AREA EXPANSION PAJARITO"            
##  [17] "AREA EXPANSION SAN ANTONIO DE PRADO"
##  [18] "ASTORGA"                            
##  [19] "AURES Nº 1"                         
##  [20] "AURES Nº 2"                         
##  [21] "BARRIO CAYCEDO"                     
##  [22] "BARRIO COLOMBIA"                    
##  [23] "BARRIO COLON"                       
##  [24] "BARRIO CRISTÓBAL"                   
##  [25] "BARRIO FACULTAD DE MINAS"           
##  [26] "BARRIOS DE JESÚS"                   
##  [27] "BARRO BLANCO"                       
##  [28] "BASILIA"                            
##  [29] "BATALLÓN GIRARDOT"                  
##  [30] "BELALCAZAR"                         
##  [31] "BELÉN"                              
##  [32] "BELENCITO"                          
##  [33] "BELLO HORIZONTE"                    
##  [34] "BERLÍN"                             
##  [35] "BERMEJAL- LOS ÁLAMOS"               
##  [36] "BETANIA"                            
##  [37] "BLANQUIZAL"                         
##  [38] "BOLIVARIANA"                        
##  [39] "BOMBONA Nº 1"                       
##  [40] "BOMBONA Nº 2"                       
##  [41] "BOQUERÓN"                           
##  [42] "BOSQUES DE SAN PABLO"               
##  [43] "BOSTON"                             
##  [44] "BOYACÁ"                             
##  [45] "BUENOS AIRES"                       
##  [46] "BUGA PATIO BONITO"                  
##  [47] "CABECERA SAN ANT DE PR."            
##  [48] "CABECERA SAN CRISTÓBAL"             
##  [49] "CALAZANS"                           
##  [50] "CALAZANS PARTE ALTA"                
##  [51] "CAMPO ALEGRE"                       
##  [52] "CAMPO AMOR"                         
##  [53] "CAMPO VALDÉS Nº 1"                  
##  [54] "CAMPO VALDES Nº 2"                  
##  [55] "CARIBE"                             
##  [56] "CARLOS E RESTREPO"                  
##  [57] "CARPINELO"                          
##  [58] "CASTILLA"                           
##  [59] "CASTROPOL"                          
##  [60] "CATALUÑA"                           
##  [61] "CERRO EL VOLADOR"                   
##  [62] "CERRO NUTIBARA"                     
##  [63] "CIUDADELA NUEVO OCCIDENTE"          
##  [64] "CORAZÓN DE JESÚS"                   
##  [65] "CÓRDOBA"                            
##  [66] "CORREGIMIENTO PALMITAS"             
##  [67] "CRISTO REY"                         
##  [68] "CUARTA BRIGADA"                     
##  [69] "CUCARACHO"                          
##  [70] "DESCONOCIDO"                        
##  [71] "DIEGO ECHAVARRÍA"                   
##  [72] "DOCE DE OCTUBRE Nº 1"               
##  [73] "DOCE DE OCTUBRE Nº 2"               
##  [74] "EDUARDO SANTOS"                     
##  [75] "EL ASTILLERO"                       
##  [76] "EL CARMELO"                         
##  [77] "EL CASTILLO"                        
##  [78] "EL CERRO"                           
##  [79] "EL CHAGUALO"                        
##  [80] "EL COMPROMISO"                      
##  [81] "EL CORAZÓN"                         
##  [82] "EL CORAZÓN EL MORRO"                
##  [83] "EL DANUBIO"                         
##  [84] "EL DIAMANTE"                        
##  [85] "EL DIAMANTE Nº 2"                   
##  [86] "EL JARDÍN"                          
##  [87] "EL LLANO"                           
##  [88] "EL NOGAL - LOS ALMENDROS"           
##  [89] "EL PATIO"                           
##  [90] "EL PESEBRE"                         
##  [91] "EL PICACHO"                         
##  [92] "EL PINAL"                           
##  [93] "EL PLACER"                          
##  [94] "EL PLAN"                            
##  [95] "EL PLAYON DE LOS COMUNEROS"         
##  [96] "EL POBLADO"                         
##  [97] "EL POMAR"                           
##  [98] "EL RAIZAL"                          
##  [99] "EL RINCÓN"                          
## [100] "EL SALADO"                          
## [101] "EL SALVADOR"                        
## [102] "EL SOCORRO / LA GABRIELA"           
## [103] "EL TESORO"                          
## [104] "EL TRIUNFO"                         
## [105] "EL UVITO"                           
## [106] "EL VELÓDROMO"                       
## [107] "EL YOLOMBO"                         
## [108] "ENCISO"                             
## [109] "ESTACIÓN VILLA"                     
## [110] "ESTADIO"                            
## [111] "FÁTIMA"                             
## [112] "FERRINI"                            
## [113] "FLORENCIA"                          
## [114] "FLORIDA NUEVA"                      
## [115] "FRANCISCO ANTONIO ZEA"              
## [116] "FUENTE CLARA"                       
## [117] "GERONA"                             
## [118] "GIRARDOT"                           
## [119] "GRANADA"                            
## [120] "GRANIZAL"                           
## [121] "GUAYABAL"                           
## [122] "GUAYAQUIL"                          
## [123] "HÉCTOR ABAD GÓMEZ"                  
## [124] "JESÚS NAZARENO"                     
## [125] "JUAN PABLO II"                      
## [126] "JUAN XXIII - LA QUIEBRA"            
## [127] "KENNEDY"                            
## [128] "LA AGUACATALA"                      
## [129] "LA ALDEA"                           
## [130] "LA AMÉRICA"                         
## [131] "LA ASOMADERA Nº 1"                  
## [132] "LA ASOMADERA Nº 2"                  
## [133] "LA ASOMADERA Nº 3"                  
## [134] "LA AVANZADA"                        
## [135] "LA CANDELARIA"                      
## [136] "LA CASTELLANA"                      
## [137] "LA COLINA"                          
## [138] "LA CRUZ"                            
## [139] "LA CUCHILLA"                        
## [140] "LA ESPERANZA"                       
## [141] "LA ESPERANZA Nº 2"                  
## [142] "LA FLORESTA"                        
## [143] "LA FLORIDA"                         
## [144] "LA FRANCIA"                         
## [145] "LA FRISOLA"                         
## [146] "LA FRONTERA"                        
## [147] "LA GLORIA"                          
## [148] "LA HONDONADA"                       
## [149] "LA ILUSIÓN"                         
## [150] "LA ISLA"                            
## [151] "LA LADERA"                          
## [152] "LA LIBERTAD"                        
## [153] "LA LOMA"                            
## [154] "LA LOMA DE LOS BERNAL"              
## [155] "LA MANSIÓN"                         
## [156] "LA MILAGROSA"                       
## [157] "LA MOTA"                            
## [158] "LA PALMA"                           
## [159] "LA PILARICA"                        
## [160] "LA PIÑUELA"                         
## [161] "LA PRADERA"                         
## [162] "LA ROSA"                            
## [163] "LA SALLE"                           
## [164] "LA SIERRA"                          
## [165] "LA SUCIA"                           
## [166] "LA SUIZA"                           
## [167] "LA VERDE"                           
## [168] "LALINDE"                            
## [169] "LAS ACACIAS"                        
## [170] "LAS BRISAS"                         
## [171] "LAS ESMERALDAS"                     
## [172] "LAS ESTANCIAS"                      
## [173] "LAS GRANJAS"                        
## [174] "LAS INDEPENDENCIAS"                 
## [175] "LAS LOMAS Nº 1"                     
## [176] "LAS LOMAS Nº 2"                     
## [177] "LAS MERCEDES"                       
## [178] "LAS PALMAS"                         
## [179] "LAS PLAYAS"                         
## [180] "LAS VIOLETAS"                       
## [181] "LAURELES"                           
## [182] "LLANADITAS"                         
## [183] "LÓPEZ DE MESA"                      
## [184] "LORENA"                             
## [185] "LORETO"                             
## [186] "LOS ALCÁZARES"                      
## [187] "LOS ALPES"                          
## [188] "LOS ÁNGELES"                        
## [189] "LOS BALSOS Nº 1"                    
## [190] "LOS BALSOS Nº 2"                    
## [191] "LOS CERROS EL VERJEL"               
## [192] "LOS COLORES"                        
## [193] "LOS CONQUISTADORES"                 
## [194] "LOS MANGOS"                         
## [195] "LOS NARANJOS"                       
## [196] "LOS PINOS"                          
## [197] "MANILA"                             
## [198] "MANRIQUE CENTRAL Nº 1"              
## [199] "MANRIQUE CENTRAL Nº 2"              
## [200] "MANRIQUE ORIENTAL"                  
## [201] "MARIA CANO - CARAMBOLAS"            
## [202] "MAZO"                               
## [203] "MEDIA LUNA"                         
## [204] "METROPOLITANO"                      
## [205] "MIRA FLORES"                        
## [206] "MIRADOR DEL DOCE"                   
## [207] "MIRANDA"                            
## [208] "MIRAVALLE"                          
## [209] "MONTAÑITA"                          
## [210] "MONTECLARO"                         
## [211] "MORAVIA"                            
## [212] "MOSCU Nº 1"                         
## [213] "MOSCU Nº 2"                         
## [214] "NARANJAL"                           
## [215] "NUEVA VILLA DE ABURRA"              
## [216] "NUEVA VILLA DE LA IGUANA"           
## [217] "NUEVOS CONQUISTADORES"              
## [218] "OCHO DE MARZO"                      
## [219] "OLAYA HERRERA"                      
## [220] "ORIENTE"                            
## [221] "PABLO VI"                           
## [222] "PAJARITO"                           
## [223] "PALENQUE"                           
## [224] "PALERMO"                            
## [225] "PATIO BONITO"                       
## [226] "PEDREGAL"                           
## [227] "PEDREGAL ALTO"                      
## [228] "PICACHITO"                          
## [229] "PICACHO"                            
## [230] "PIEDRA GORDA"                       
## [231] "PIEDRAS BLANCAS"                    
## [232] "POPULAR"                            
## [233] "POTRERA MISERENGA"                  
## [234] "POTRERITO"                          
## [235] "PRADO"                              
## [236] "PROGRESO"                           
## [237] "PROGRESO  Nº 2"                     
## [238] "ROBLEDO"                            
## [239] "ROSALES"                            
## [240] "SAN ANTONIO"                        
## [241] "SAN BENITO"                         
## [242] "SAN BERNARDO"                       
## [243] "SAN DIEGO"                          
## [244] "SAN GERMÁN"                         
## [245] "SAN ISIDRO"                         
## [246] "SAN JAVIER Nº 1"                    
## [247] "SAN JAVIER Nº 2"                    
## [248] "SAN JOAQUÍN"                        
## [249] "SAN JOSÉ"                           
## [250] "SAN JOSE DE LA MONTAÑA"             
## [251] "SAN JOSÉ DEL MANZANILLO"            
## [252] "SAN JOSE LA CIMA Nº 2"              
## [253] "SAN JOSELA CIMA Nº 1"               
## [254] "SAN LUCAS"                          
## [255] "SAN MARTÍN DE PORRES"               
## [256] "SAN MIGUEL"                         
## [257] "SAN PABLO"                          
## [258] "SAN PEDRO"                          
## [259] "SANTA CRUZ"                         
## [260] "SANTA ELENA SECTOR CENTRAL"         
## [261] "SANTA FE"                           
## [262] "SANTA INES"                         
## [263] "SANTA LUCIA"                        
## [264] "SANTA MARGARITA"                    
## [265] "SANTA MARIA DE LOS ÁNGELES"         
## [266] "SANTA MÓNICA"                       
## [267] "SANTA ROSA DE LIMA"                 
## [268] "SANTA TERESITA"                     
## [269] "SANTANDER"                          
## [270] "SANTO DOMINGO SABIO Nº 1"           
## [271] "SANTO DOMINGO SABIO Nº 2"           
## [272] "SECTOR CENTRAL"                     
## [273] "SEVILLA"                            
## [274] "SIMÓN BOLIVAR"                      
## [275] "SUCRE"                              
## [276] "SURAMERICANA"                       
## [277] "TEJELO"                             
## [278] "TOSCANA"                            
## [279] "TRAVESÍAS"                          
## [280] "TRECE DE NOVIEMBRE"                 
## [281] "TRICENTENARIO"                      
## [282] "TRINIDAD"                           
## [283] "URQUITA"                            
## [284] "VEINTE DE JULIO"                    
## [285] "VERSALLES Nº 1"                     
## [286] "VERSALLES Nº 2"                     
## [287] "VILLA CARLOTA"                      
## [288] "VILLA DEL SOCORRO"                  
## [289] "VILLA FLORA"                        
## [290] "VILLA GUADALUPE"                    
## [291] "VILLA HERMOSA"                      
## [292] "VILLA LILIAM"                       
## [293] "VILLA NIZA"                         
## [294] "VILLA NUEVA"                        
## [295] "VILLA TINA"                         
## [296] "VILLA TURBAY"                       
## [297] "VOLCANA GUAYABAL"                   
## [298] "YARUMALITO"